home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Format CD 49
/
Amiga Format CD49 (2000-01-17)(Future Publishing)(GB)(Track 1 of 3)[!][issue 2000-02].iso
/
-serious-
/
programming
/
e
/
powerd0.06
/
modules
/
datatypes
/
datatypes.m
< prev
next >
Wrap
Text File
|
1999-11-30
|
2KB
|
99 lines
MODULE 'dos/dos',
'exec/libraries',
'exec/lists',
'exec/nodes',
'libraries/iffparse',
'utility/tagitem'
CONST ID_DTYP=$44545950,
ID_DTHD=$44544844
OBJECT DataTypeHeader
Name:PTR TO CHAR,
BaseName:PTR TO CHAR,
Pattern:PTR TO CHAR,
Mask:PTR TO INT,
GroupID:LONG,
ID:LONG,
Masklen:INT,
pad:INT,
Flags:UWORD,
Priority:UWORD
CONST DTF_TYPE_MASK=15,
DTF_BINARY=0,
DTF_ASCII=1,
DTF_IFF=2,
DTF_MISC=3,
DTF_CASE=16,
DTF_SYSTEM1=$1000,
GID_SYSTEM=$73797374,
GID_TEXT=$74657874,
GID_DOCUMENT=$646F6375,
GID_SOUND=$736F756E,
GID_INSTRUMENT=$696E7374,
GID_MUSIC=$6D757369,
GID_PICTURE=$70696374,
GID_ANIMATION=$616E696D,
GID_MOVIE=$6D6F7669,
ID_CODE=$44544344,
DTHSIZE=32
OBJECT DTHookContext
SysBase:PTR TO Lib,
DOSBase:PTR TO Lib,
IffParseBase:PTR TO Lib,
UtilityBase:PTR TO Lib,
Lock:LONG,
Fib:PTR TO FileInfoBlock,
FileHandle:LONG,
Iff:PTR TO IffHandle,
Buffer:PTR TO CHAR,
BufferLength:LONG
CONST ID_TOOL=$4454544C
OBJECT Tool
Which:UWORD,
Flags:UWORD,
Program:PTR TO CHAR
CONST TW_INFO=1,
TW_BROWSE=2,
TW_EDIT=3,
TW_PRINT=4,
TW_MAIL=5,
TF_LAUNCH_MASK=15,
TF_SHELL=1,
TF_WORKBENCH=2,
TF_RX=3,
ID_TAGS=$44545447
OBJECT DataType
Node1:LN,
Node2:LN,
Header:PTR TO DataTypeHeader,
ToolList:LH,
FunctionName:PTR TO CHAR,
AttrList:PTR TO TagItem,
Length:LONG
OBJECT ToolNode
Node:LN,
Tool:Tool,
Length:LONG
CONST ID_NAME=$4E414D45,
DTERROR_UNKNOWN_DATATYPE=$7D0,
DTERROR_COULDNT_SAVE=$7D1,
DTERROR_COULDNT_OPEN=$7D2,
DTERROR_COULDNT_SEND_MESSAGE=$7D3,
DTERROR_COULDNT_OPEN_CLIPBOARD=$7D4,
DTERROR_RESERVED=$7D5,
DTERROR_UNKNOWN_COMPRESSION=$7D6,
DTERROR_NOT_ENOUGH_DATA=$7D7,
DTERROR_INVALID_DATA=$7D8,
DTMSG_TYPE_OFFSET=$834,
DTNSIZE=58,
TNSIZE=26